home *** CD-ROM | disk | FTP | other *** search
/ Internet Info 1994 March / Internet Info CD-ROM (Walnut Creek) (March 1994).iso / networking / terms / kermit / b / ckmkr2.r < prev    next >
Encoding:
Text File  |  1992-11-22  |  2.2 KB  |  89 lines
  1. /* $Id: ckmkr2.r,v 1.7 91/12/15 23:17:45 rick Exp $
  2.  * $Source: /uw/mackermit/RCS/ckmkr2.r,v $
  3.  *------------------------------------------------------------------
  4.  * $Log:    ckmkr2.r,v $
  5. # Revision 1.7  91/12/15  23:17:45  rick
  6. # ut9
  7. # 
  8. # Revision 1.6  91/10/13  13:43:34  rick
  9. # UT(7)
  10. # 
  11. # Revision 1.5  91/10/01  12:16:52  rick
  12. # UT(5)
  13. # 
  14. # Revision 1.4  91/09/25  12:17:22  rick
  15. # Command window in TE. Multiple vt100 windows for command window.
  16. # 
  17. # Revision 1.3  91/09/12  21:50:48  rick
  18. # UT(3). Install on watsun
  19. # 
  20. # Revision 1.2  1991/09/10  22:21:46  rick
  21. # Update to UTexas(2)
  22. #
  23. # Revision 1.1  1991/09/10  19:18:00  rick
  24. # Initial revision
  25. #
  26.  *------------------------------------------------------------------
  27.  * $Endlog$
  28.  */
  29.  
  30. /*
  31.   Copyright (C) 1985, 1992, Trustees of Columbia University in the City of New
  32.   York.  Permission is granted to any individual or institution to use this
  33.   software as long as it is not sold for profit.  This copyright notice must be
  34.   retained.  This software may not be included in commercial products without
  35.   written permission of Columbia University.
  36. */
  37.  
  38. /* Create the version string for Kermit with the last compi-    */
  39. /* lation time. Compile this resource definition with Rez.        */
  40. /* Created: 10/12/87 Matthias Aebi                                */
  41. /* Modifications:                                                */
  42.  
  43. type 'KR09' {
  44.     byte = lenlabel / 8 - 1;    /* length of array */
  45.     array CompileTime {
  46.         string;
  47.         byte;        /* month first digit */
  48.         byte;        /* month second digit */
  49.         byte = '/';
  50.         byte;        /* day first digit */
  51.         byte;        /* day second digit */
  52.         byte = '/';
  53.         byte;        /* year first digit */
  54.         byte;        /* year second digit */
  55.         byte = ' ';
  56.         byte;        /* hour first digit */
  57.         byte;        /* hour second digit */
  58.         byte = ':';
  59.         byte;        /* minute first digit */
  60.         byte;        /* minute second digit */
  61.     };
  62.     lenlabel:;
  63. };
  64.  
  65. resource 'KR09' (0) {
  66.     {    
  67.         "Kermit Version 0.99(188) \321 ",
  68.         ($$Month/10)+48,
  69.         ($$Month%10)+48,
  70.         ($$Day/10)+48,
  71.         ($$Day%10)+48,
  72.         ($$Year%100/10)+48,
  73.         ($$Year%10)+48,
  74.         ($$Hour/10)+48,
  75.         ($$Hour%10)+48,
  76.         ($$Minute/10)+48,
  77.         ($$Minute%10)+48
  78.     }
  79. };
  80.  
  81. /*
  82.  * Junk so Emacs will set local variables to be compatible with Mac/MPW.
  83.  * Should be at end of file.
  84.  * 
  85.  * Local Variables:
  86.  * tab-width: 4
  87.  * End:
  88.  */
  89.